home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio 2000 / Ham Radio 2000.iso / ham2000 / tcp_ip / gracil / p10dvr / rmtcfg.c < prev    next >
C/C++ Source or Header  |  1992-09-07  |  6KB  |  285 lines
  1. /****************************************************************************
  2. *
  3. *            COPYRIGHT 1990,91,92 BY GRACILIS INC.
  4. *
  5. *             623 Palace St.
  6. *             Aurora, Il. 60506
  7. *
  8. *             (708)-801-8800        Office
  9. *             (708)-844-0183        (FAX - Support BBS)
  10. *
  11. * GRACILIS, INC., MAKES NO REPRESENTATIONS ABOUT THE SUITABILITY OF THIS 
  12. * SOFTWARE FOR ANY PURPOSE.  
  13. *
  14. * THIS SOFTWARE IS PROVIDED "AS IS" WITHOUT EXPRESS OR IMPLIED WARRANTY.
  15. * 
  16. * Permission is granted for non-commercial use/distribution only, as long as
  17. * this copyright header is included intact and unaltered.
  18. *
  19. ******************************************************************************/
  20.  
  21.  
  22. /* Remote Configuration Server */
  23. #include <stdio.h>
  24. #include <string.h>
  25. #ifdef PACKETEN_PC
  26. #include <time.h>
  27. #include <sys/timeb.h>
  28. #endif
  29. #include "global.h"
  30. #include "files.h"
  31. #include "mbuf.h"
  32. #include "socket.h"
  33. #include "session.h"
  34. #include "proc.h"
  35. #include "dirutil.h"
  36. #include "commands.h"
  37. #include "mailbox.h"
  38. #include "config.h"
  39. #include "cmdparse.h"
  40. #include "netuser.h"
  41. #include "rmtcfg.h"        /* get the port # for the server to watch */
  42.  
  43. extern struct cmds Cmds[];
  44.  
  45. #ifdef PACKETEN            /* Are we building for a P10 itself? */
  46. #define RMTCFG_CLIENT 1
  47. #endif
  48.  
  49. #ifdef PACKETEN_PC        /* OR or we build a PC load to talk to a P10? */
  50. #define RMTCFG_SERVER 1
  51. #define RMTCFG_CLIENT 1
  52. #endif
  53.  
  54. static int Sremotesrv = -1;    /* Prototype socket for service */
  55.  
  56. #ifdef RMTCFG_SERVER
  57.  
  58. char    *Rmtcfg_dir="/rmtcfg";    /* Base directory for config files... */
  59.  
  60. static void rmtcfg_srv __ARGS((int s,void *unused,void *p));
  61.  
  62. /* Start up remote configuration service */
  63. int
  64. rmtcfg_start(argc,argv,p)
  65. int argc;
  66. char *argv[];
  67. void *p;
  68. {
  69.     struct sockaddr_in lsocket;
  70.     int s;
  71.  
  72.     if(Sremotesrv != -1){
  73.         return 0;
  74.     }
  75.     psignal(Curproc,0);    /* Don't keep the parser waiting */
  76.     chname(Curproc,"RmtCfg listener");
  77.  
  78.     lsocket.sin_family = AF_INET;
  79.     lsocket.sin_addr.s_addr = INADDR_ANY;
  80.     if(argc < 2)
  81.         lsocket.sin_port = IPPORT_RMTCFG;
  82.     else
  83.         lsocket.sin_port = atoi(argv[1]);
  84.  
  85.     Sremotesrv = socket(AF_INET,SOCK_STREAM,0);
  86.     bind(Sremotesrv,(char *)&lsocket,sizeof(lsocket));
  87.     listen(Sremotesrv,1);
  88.     for(;;){
  89.         if((s = accept(Sremotesrv,NULLCHAR,(int *)NULL)) == -1)
  90.             break;    /* Service is shutting down */
  91.  
  92.         /* Spawn a server */
  93.         newproc("RmtCfg server",1024,rmtcfg_srv,s,NULL,NULL,0);
  94.     }
  95.     return 0;
  96. }
  97.  
  98. static void
  99. rmtcfg_srv(s,unused,p)
  100. int s;
  101. void *unused;
  102. void *p;
  103. {
  104.     char configfile[80];
  105.     FILE *fp;
  106.     char *file;
  107.  
  108.     sockmode(s,SOCK_ASCII);
  109.     sockowner(s,Curproc);
  110.  
  111.     log(s,"Remote Config Start");
  112.  
  113.     /* Wait for the name of the requested file from the remote end */
  114.     recvline(s,configfile,80);
  115.  
  116.     rip(configfile);
  117.  
  118.     /* If no config file is specified... */
  119.     if(strlen(configfile) == 0)
  120.     {
  121.         usprintf(s,"#Rmtcfg Server: No Filename Specified!\n");
  122.     }
  123.     else 
  124.     {
  125.         rmtcfg_read(s,configfile);
  126.     }
  127.     close_s(s);
  128.     log(s,"Remote Config Complete");
  129. }
  130.  
  131. int
  132. rmtcfg_stop(argc,argv,p)
  133. int argc;
  134. char *argv[];
  135. void *p;
  136. {
  137.     close_s(Sremotesrv);
  138.     Sremotesrv = -1;
  139.     return 0;
  140. }
  141.  
  142. /* Open a requested config file, read and send it to the given socket */
  143. rmtcfg_read(s,filename)
  144. int    s;
  145. char    *filename;
  146. {
  147. FILE    *fp;
  148. char    *file;        /* derived file name */
  149. int    sts;
  150. char buf[81];
  151.  
  152.     file = (char *)pathname(Rmtcfg_dir,filename);
  153.     log(s,"Opening config file: %s\n",file);
  154.  
  155.     if((fp = fopen(file,READ_TEXT)) == NULLFILE)
  156.     {
  157.         usprintf(s,"#Config file: %s is unavailable.\n",file);
  158.         free(file);
  159.         return(0);
  160.     }
  161.     free(file);        /* free up the filename string */
  162.  
  163.     /* Send him a comment line with the filename in it... */
  164.     usprintf(s,"#Config file: %s:\n",file);
  165.  
  166.     while(fgets(buf,sizeof(buf),fp),!feof(fp))
  167.     {
  168.         usprintf(s,"%s",buf);
  169.         pwait(NULL);        /* give up the processor for others to run */
  170.     }
  171.  
  172.     fclose(fp);
  173.     return (0);
  174. }
  175.  
  176.  
  177. #endif    /* RMTCFG_SERVER */
  178.  
  179.  
  180. #ifdef RMTCFG_CLIENT
  181.  
  182. /* Remote configuration client */
  183.  
  184. int do_rmtcfg_request __ARGS((int argc,char *argv[],void *p));
  185.  
  186. /* Request configuration data from a remote server */
  187. do_rmtcfg_request(argc,argv,p)
  188. int    argc;
  189. char *argv[];
  190. void *p;
  191. {
  192.     struct sockaddr_in sock;
  193.     int     s;                /* socket # to use */
  194.     char    linebuf[81];    /* temp storage */
  195.     char    linetmp[81];    /* temp storage */
  196.     int        lineno;
  197.     char    ipaddr_buf[20];
  198.  
  199.     if(argc < 3)
  200.     {
  201.         tprintf("Usage: rmtcfg <server> <filename> [optional TCP Port #]\n");
  202.         return 1;
  203.     }
  204.  
  205.     sock.sin_family = AF_INET;
  206.  
  207.     if(argc >= 4) 
  208.     {
  209.         sock.sin_port = atoi(argv[3]);
  210.         if(sock.sin_port == 0) 
  211.         {
  212.             tprintf("Invalid PORT number: %s\n",argv[3]);
  213.             return 1;
  214.         }
  215.     }
  216.     else    sock.sin_port = IPPORT_RMTCFG;
  217.  
  218.     /* resolve the Rmtcfg_servers IP address... */
  219.     if((sock.sin_addr.s_addr = resolve(argv[1])) == 0){
  220.         /* If unable to resolve the address...*/
  221.         tprintf("Rmtcfg: %s is unknown.\n",argv[1]);
  222.         return 1;
  223.     }
  224.  
  225.     tprintf("Rmtcfg: File %s    Host %s    TCP port: %d.\n",
  226.                 argv[2],argv[1],sock.sin_port);
  227.  
  228.  
  229.     /* Allocate the socket... */
  230.     if((s = socket(AF_INET,SOCK_STREAM,0)) == -1){
  231.         /* If cant get a socket... */
  232.         tprintf("Rmtcfg: Can't allocate a Socket!\n");
  233.         return 1;
  234.     }
  235.     sockmode(s,SOCK_ASCII);
  236.  
  237.     /* Only wait for 1 minute... if no answer... then assume */
  238.     /* the server is down... */
  239.  
  240.     alarm((long)(60*(1000L/MSPTICK)));
  241.  
  242.     /* establish the connection... */
  243.     if(connect(s,(char *)&sock,sizeof(sock)) == -1){
  244.         /* couldn't connect... */
  245.         close_s(s);
  246.         alarm(0L);
  247.         tprintf("Rmtcfg: Unsuccessful connect attempt.\n");
  248.         return 1;
  249.     }
  250.  
  251.     alarm(0L);
  252.  
  253.     /* tell the Rmtcfg server what file to send us... */
  254.     usprintf(s,"%s\n",argv[2]);
  255.     usflush(s);
  256.     
  257.     /* The bootup process better not take more than 60 Secs... */
  258.     alarm((long)(60*(1000L/MSPTICK)));
  259.  
  260.     lineno = 0;    
  261.     /* receive data till there is no more... */
  262.     while(recvline(s,linebuf,80) >= 0)
  263.     {
  264.         tprintf("%s",linebuf);
  265.         strcpy(linetmp,linebuf);
  266.         if(cmdparse(Cmds,linebuf,NULL) != 0)
  267.         {
  268.             tprintf("input line: %s",linetmp);
  269.         }
  270.         lineno++;                    
  271.     }
  272.  
  273.     alarm(0L);
  274.  
  275.     /* close the connection... */
  276.     close_s(s);
  277.  
  278.     /* Return successful completion of bootserver conversation */
  279.     return 0;
  280.  
  281. }
  282.  
  283. #endif
  284.  
  285.